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major solutes considered explicitly. The control of body 
water and electrolyte distribution 1s affected via drinking 
hormone levels. 


~ini.“TTtzj 


Attachment 

/db 


J 

<0 


CONCURRENCES 

Counterpart: 



DISTRIBUTION GE/AGS: Central Product File 

R. F. Hassell 

NASA/ JSC: Technical Library/JM6 

(1979 distribution) 

C 1 uSton 
V. J. Marks 

Page No. 
1 of 1 


ASD 4028 





PROGRAM DESCRIPTIOH 


A. n«HTiyiCATIOW 

Prograa Name > Fluid and Electrolyte Balance Model (FCB) 

Programmer 'a Name - Ronald J. White and Larry Neal 
Date of Issue - December U, 1972 

Versions Obsolesced by this Program - Body Water and Electrolyte 

Balance (WATBAL), by Thomas 0. Cleaver 

B. GENERAL DEaCHlPTION 

This model follows the effect of various oral input water loads on 
solute and water distribution throughout the body. It is a three 
compartment model, the three (ompartments being plasma, interstitial 
fluid and cellular fluid. Sodium, potassium, chloride and urea are 
the only major solutes considered explicitly. The control of body 
water and electrolyte distribution is affected via drinking and 
hormone levels . 

C. USAGE AND RE8TRICTICTIS 

Machine and Compiler Required - Xerox Sigma 3 - ANSI FORTRAN 

Peripheral Equipment Required - Card reader and line printer. 

Approximate Amount of Memory Required - +lU02 hexldeclmal. 

D. PARTICULAR DESCRIPTION 


Equations Used and Derivations - See TIR No. 7^1 -MU)- DIO 

Definitions of Terms Used - Particular effort was made to see that 
all terms and arrays used in the program were defined on comment 
cards in the program deck. 

Detailed Description - This program simulates the changes in levels 
of the twenty-three q antitles listed in description of input when a 
person of average size consumes a quantity of water after having no 
oral water intake for six hours. 

The user of the prograun may select as many as nine of the twenty-three 
quantities and ha\'»» their levels printed out in column form at ten- 
minute Increments after consumption of the water (sixty-minute incre- 
ments before consumption). 

The program is presently designed to use cards as the input mechanism 
and printed page (132 columns) as the output mechanism. Each data 
card should nave an integer right Justified in card column 5. The integer 
in the first data card tells the cuaiitity of water consumed (in milliters). 


The integer in column 5 of the second data card tells how manv (from 1 
to 9) columns of information are requested. Then that number of data 
cards follows, one for each column of information requested, arremged 
in the order in which the user wants the columns to be printed. Each 
of these remaining data cards should have an Integer from one to 
twenty-three right Justified to card column 5 together with any appro- 
priate column heading (preferably centered) in columns 10 thru 17 for 
the quantity which that integer represents, according to the list in 
description of input. 

The output will consist of a statement of the quantity of water 
consumed followed by the column headings which the user selected (in 
the order in which the data cards are arranged) and the levels of 
these quantities at ten-minute increments after the water is consumed. 
The output may be considered accurate to at most three signficant 
figures in spite of the figures given. 

E. DESCRIPTION OF INPOT 


1. Control and Program Cards - (Begin column l) 

:j0b 

: FORTRAN 

(Source Deck - See Appendix A) 

’.E0D 

1OL0AD 

:$R00Tlfi512,,G0 

1$END 

:XEQ 


(Data) 

:e0d 

?. Data Cards (Columns, format, neune, definition) 


1-5 

15 

N0MIA/C 

No. of ml of H2O consumed 

1-5 

15 

N0REQ 

No. of items requested, max ■ 9 
of 23 available 

1-5 

15 

NUMBER 

Item number, 1-23 

6-9 



Blank 

10-13 

A4 

ALPHA 

U character column heading 

lU-17 

A4 

BETA 

4 character column heading 


One card for each item requested, maximum 9 out of following 23 
possible. 
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Number Suggested Headings 

(Columns 4 t 5) (Columns 10 thru 17) 


1 

BELLYUVH 

2 

HGUTUVim 

3 

PLASMUV 

4 

INTERSHV 

5 

CELLUFHV 

6 

TOTALUVH 

7 

UUML/MIN 

8 

PLASMAHS 

9 

INTERSHS 

10 

ALLHSOLU 

11 

UHSHRATE 

12 


13 

HRENINHH 

14 

AN6I0TEN 

15 

ALDOSTER 

16 

UNAHLOSS 

17 

HHKHLOSS 

18 

HHCLULOSS 

19 

UREAtILOSS 

20 

PLASMAHO 

21 

IirrERSItO 

22 

CELLUFHO 

23 

URINEKOH 


Quanti ty 
(Units) 

Vol. of Mater In stomach (ML) 

Vol. of water In Intestines (ML) 

Vol. of water In plasma (ML) 

Vol. of water In Interstitial 
space (ML) 

Vol. of water In cell fluid (ML) 

Total water vol. In above 3 (ML) 

Rate or production of urine 
(ML/MIN) 

Total solute In plasma (m Osmols) 

Total solute In Interstitial 
space (m Osmols) 

Total solute In plasma. Inter* 
stitlal space and cells (m Osmols) 

Rate of production of solutes 
In urine (m 0smo1s/M1n) 

ADH 

Renin 

Angiotensin 

Aldosterone 

Sodium Loss Rate (m Osmols/Mln) 

Potassium Loss Rate (m Osmols/Mln) 

Chloride Loss Rate(m Osmols/Mln) 

Urea Loss Rate (m Osmols/Mln) 

Plasma Osmolarlty (m Osmols/Llter) 

Interstitial Osmolarlty 
(m Osmols/Llter) 

Cell Fluid Osmolarlty (m Osmols/Llter) 
Urine Osmolarlty (m Osmols/Llter) 
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F. 


DESCRIPTION OF OUTPUT 


Printer Output - First a statement of the quantity of Mater consumed, 
then column headings Mhich the user has selected and the levels of 
these quantities at 10 second Increments after Mater Is consumed. 

Example: 

The folloMing Input data Mill give the sample output: (See Appendix A) 


1-5 

COLUMN NUMBER 
6-9 

10-17 

1500 

5 

3 

N 

PLASMAHV 

20 


PLASMABO 

7 

K 

UBML/MIN 

23 


URINEBOB 

2 

It 

BGUTBVBB 


G. I NTERNAL CHECKS AND EXITS 
None. 

H. INDEPENDENT SUBROUTINES 
None. 

I. SYSTEM SUBROUTINES 

No special subroutines 

J. COMPLETION OR FINAL CHECKOUT DATE - 12/4/72 

Source listing and logic diagram Is given In Appendix A. 
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APPENDIX A 


SOURCE LISTING 
AND 


SAMPLE CASE 


PLASMA OSMOLARITY 



GENERAL FLOW CHART OF WATER AND ELECTROLYTE BALANCE. 










nnononooono on nononoonoo no onnononnononooooo 


C A F T K _F^A 8 TT NO FAR 6 Mnuw8» THF SUB JFCT CaN8UHF l A atVFIi QUANTlTjr_QF_ifA 

SPECIFy THIS QUA*<TITY IN ML AS AN TNTEQER RIGHT JUSTIFIED IN COLUMN 5 OF 
the first oaTa^capo. „ .... . 

FRMH the FMl lowing 1,IS,T»_T0U MAY. 8ELtCT_A8 MANY_JkR_NINE..OF .THE 

TwENTv-THREF OUANT'ITIFS that you APF INTERESTED IN* 

The R R I N_T_ 0 l lT W I L,1. consist of a .QO LUMN of th e I N DF_RF^FJtT_TJLN£ 

VABTAHLE in ten MINUTE INCBfMFNTS AFTER CONSUMPTION (60 MTN INCREMENTS 

BEFORE CONSUMPTION )_ FOLI. OWED RY C0LUMNS_0F_ THE I NFORMA T T »'N _Y0U REtJUEST# 

IN THE ORDFR IN WHICH THEY ARE REQUESTED# AT EACH TEN MINUTE INCREMENT. 

The input should CONSIST OF A SFCONO.OATA CAPO HAViNO.AN INTEGER 

from 1 T(1 9 IN COLUMN 5 TELLING MOW MANY QUANTITIES YOU SELECT# 

E OLl. 0 W E D_ R Y_T H AT NUMHFW OE 0 A_TA_CAROS#_E.A_CiLJlAyjLNO_A.N_l2LTE.OER_FA0JR_JLJUl_23_ 
'right JuSTTFIEO IN COLUMN 5 TOGETHER WITH ANY APPROPRIATE COLUMN HEADING 
(PrfPEBABLY CENTERE0»„IN COLUMNS 10 - 17 EOR THE QUANTITY WHICH THAT 
INTEGER COOES#* a'CCOROING TO THE FOLI OWING LIST! 

1 - VOL OF water .IN stomach 

2 - VOL OF water 'in TNTESTTNFS 

_ 3 » VO L_0 E_W ATER i n pla sma 

\ - VOL ME water in interstitial El.UTO 

5 - VOL OE water in CEIL ELUTD .. .. „ . . 

6 - total water volume IN PLASMA# INTERSTITIAL SPACE# AND CELLS 

7 - RATE OE production OF URINE 

8 - total SOLUTE IN PLASMA 

9 - TOTAL SOLUTE IN INTERSTI T I>k_F(.UlD 

10 - TOt'ai. solutes IN PLASMA# INTERSTITIAL SPACE AND CEl.LS 

11 - BATE OF PRODUCTION OF SOl.UTES_IN URINE 

12 - aDH 

13 - BENIN 

lA - angiotensin 

_1 b_-_ _A L 0 OST.fr ON E 

'l6 -"sUniUM LOSS 

17 • potassium L0SS_ ... . _ 

18 - CHLORIOE loss 

19 - UREA LOSS _ . ... - 

20 - plasma OSMOLARITY 

.21 TNTtRSTl.TlAL. ELUTD OSM OLARITY 

22 - CELL fluid OSMOLARITY 

23 « L'RINF OSMOLARITY .... . _ 

VOLUME IS GIVEN IN ML# TIME IN M INIJTES#. AMOUNTS OF SOLUTE IN 

MILLIOSMOLFS# AND OSMOLARITY IN MILI IflSMOLES/L I TER 


c««*« 

This 


VART 


ACCO 

c»*** 

ALPH 

c***» 

A 

m 

c»«»« 

B 

am 

c***» 

c 

m 


D 

m 

c*«*« 

e 

m 

c»««* 

F 



G 
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H 
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"l 

m 

* 

J 
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IS the program EOR BODY WATER AND ELECTROLYTE BALANCE 
AMLES AND CONSTANTS USED IN THIS PROGRAM WILL BE USED 
RDING TO THE FOLLOWING FORMAT 
ABET 1C variables AND CONSTANTS 

aldosterone 

BLOOD VOLUME 

CmLORTOF 

DELTA T (THE INTEGRATING TIME INTERVAL) 

ebytmrocyte volume 


ANGIOTENSIN 

ADH 

C»’NSTaNTS related TO CAPILLARIES 

Constants related th cfi l-intfpstitt al interface .. 


! 


nonnn nnn on nl ,r» n 


K • PeTA98lUM_|HlULlORMnLE8l 

L - rriNfiTANTS related TH ADM PROOUCTIflN 

M_-_CflNS T ant 8_RF^LA Trj)_Tff_Al nflRT gaONP. PHeDUCTiaN 

’n • SPOlUM i'mILL E8 » 

e • PRMt^LARTTY I M I LL 1 flShOLES/L I TER I . _ . 

p - PMt^ssuMP I millimeters oe mercury J 

U • TpTaI. RCLUTE « MILI IMSMfli PS I 
R • RENIN 

T - S-LUTE PTmER _THAN_NA# CL« U t MILI^ IWIMBLEII 

T - TIMfc CMNSTAnToR time (MlNSI 

U - I'WEA «MTLLie8M0LER) . . . I. 

V - VOLUME «MILL1LITERS» 

w • Constants related Tn_TME. kidney 

X - plasma protein 

Y_- C>«NSTaNT8 RPLATI NQ urine output T O UREA BUTRUT 

Z • A measure OE kidney sensitivity to ADM 

SUnSCRiPTS 

1 • D/OT «TTME OER^IVATIVEI 

2 - EXTERNAL tNPUT_OR_.mjTPUT 

3 - STD^ACM 

» " InTEST InE 

‘b - plasma 

N - interstitial. FLUID „ 

7 - CELL FLUID 

K - URINE 

9 > MTHER 

.0 A V L R A 0 E. DCtiRED OR WfERE MCE YAUIC 

real VI167)«0(167)«0(9)«N#K«I1«I2*T3«IA»T5«I6aJ 

REAL LO#l t .L?#L3/LA#I 5t Ml , M2* M3/ MA# M5» M6» M7/M8».N3/K3» NR 

real K3a*K%5 

dimension CrLI23)/ ALPHAOJ* BETAC9J 


«K2*N1 


NOMI WC_ 1 8 TmE numbe r OE M L» QE WATER CONSUMED*- 


READ (5*2000) _NOMLWC 

2000 EORMATdSI 

WRITE (6*2010) NOMLWC 
2010 format ( 34X» • AETER FaSTINQ FOR 4 

1'ML OF WATFRtl/lJ 

VWC ■ V(JLUMF OF WATER CONSUMED 
VWC-NOMLWC 


HOURS* THE SUBJECT CONSUMES • 15/ IX* 


NOMLWC 


NORFQ • number of COI.UMNS OE INFORMATION REQUESTED 
READ (5*2200) NOREO 

2200 FORMAT) Tb) - 

•*••**««»•**««*»« INITIALIZE variables AND DEFINE CONSTANTS ****** 
**** 

»*** THE SliOJECT TAKES A DRINK OF WATER AT TIME TS 
T*> ■ 3fel» 

V(50)* V(60) AND V(70) ARE THE NORMAL VALUES OF 
**** the. plasma* _InTERSTLT_T.AJ.._F_LU 1D AND.CELLS/. RESPECJJ.VELY_IN_.ML_ 
AtCOPDiNG TO OUYTON'S TEXTBOOK OF MEDICAL PHYSIOLOGY (1SA6)/ 
V(50)»3000* V(60)«12000» V(70)»25000* AND E-2000 ML* 


V) SO ) 
V( 50 ) 
V) 60 ) 
,V( 60 ) 
V( 7r> ) 
V(7C) 


• 3200. 

« 3000* 

■ 13X00* 
•_ 1 20P.0-*. 

■ 2K000* 

■ 25000* 


n o' o o I o on on n o o ooo ,oon 


c»*** 00_I«_TME MW WWAL etMBLA BITV-OF HOOY.FLUID . IN. M08M0L/L1TE^ 
00 > 300* 

_C*VJL_V.( 50 )._ 18 NBftHAL TOTAL HB QY MATgB 

V I 90 I aV( SO I ♦VI 60 I ♦VI 70) 

c**»* 0 IS THt tnteoratxnq interval in HINUTU. - 

0*1 • 

► ••• VI?3I IS TNF INPUT WATER LOAD — 

V I ?3 I • • 6a 

»6A mi /HlN W F WATER AR F RWAI LBWrP IN 8ALlVA^ 

RATE«*6A 

>••• Ni K« C» AND U ARE .THE_T0TAI .AMOONTR 0E_T.HE 80LUTE8_NA# «/ 
»••• CL ANO UREA 0I8S0LVE0 IN THF BODY F| UI09» RESPECTIVELY 

»•*•»••••«»•••••» general 

N»VI 90»*130./1000« 

_ K«V I 90 l»S»1/1 0QQt 

C>N^< 

U-VI 90 »*5»0/lP00«. _ ... -- 

»••• S IS ALL MTMER solutes TN TME BODY FLUID 

S-IOO/IOOO. l*V.I90).-N-K-r.-U - 

»••• 0191 IS The total INITIAL SOLUTE IN THE BODY 
Q I 9 > 

• stomach 

• ••• VISA) IS THF VOLUME THAT.HAS FLOWEO.FROM STOMACH TO INTFST] 
VI3a)«0. 

T3-P0. _ 

K34-J./T3 

****** ** ******* ** OUT 

VI AS laO* 

Ta»1 H. 

KaS-1 ./TA ~ 

VI156)«0. 

VI J I "O* 

VI 1 K )»0. 

VI 1591 I _ 

VI 1?5 I "1 . 

VI5)-VI50) . . . _ . 

Ull56)-0* 

0 1 1 6S )«0. 

0I1S)»0. 

Ql 1S9 )«OOaVI 1591/1000. _ 

UI5)»OC9)aVI50)/VI90) 

*****^m0********* interstitial FLUID. 

VI 167 1 -o. 

Vll6>*)».b — 

Ql 16?)«*?AVI 162) 

VI 6) -VI 60) . . 

0I6)-OI9)aVI60)/V|90) 

******^»mm******* CELLS *************************************** 

VI7)-VI70) 

0 1 7 ) -»J I 9 ) * V I 70_»y V_I_9_0J 

CAPILLAPTFS ********************************* 

E-3000. 

E-2000. 

B0-FAVI50) 

11-25.3/BO 

12-9.0/00 ! - 

P6-»7 . 

13-1 ./2B0. 


X2«A9* 

x_-pn_.o*3t. 

U»j'.7 

P5*«t9 

15>1 *7 
l6al *00* 


J»X00... 

L0-.9 

L1"?0. 

L?»90t/L0 

L3-00 

Hftaf.00* 

H7bH6 

M9aM^ 

M5-?S.0*VH>0» 

T9a?«*4 

ALOOSTEReJNF • 

Bl«7000. 

TO-100. 

Tl-TO 

TP-TO 

"*i2.v«!iOI 

H3-V(50) 

M*-« .755-.14«», (T0*T1*T?*i 

RP-mi*«B1-P0)*T0 

0?-02.H?*T1/V«50» 

A2«n?.*H3#T2/.VLS0J 

M6a.0*/I (B1»B0)*T0*Tl*T?» 
H7a» 1 .O/.OOSl »*A2/T2 
M8-.5 

M5».7S5*VI 90 »/N 

•«*»«««»•»»«• KIDNEY 

H-S. 

T8«1 X0» 

Z»M*TX 

wl-1. 

W2a.% 

W3a.K 

Yl.SO. 

Y2-l.!5 

Y3-»3 ..... 

N3>ttB«'0*1 3*N/0(9) 

K3-.04^0.13*K/0(9) 

C3»N3*K3 

_ U3a. 3?^0.O 3*N/0.L9J 

S3-.03^0*13«S/Q(9) 

0« 12B J ■N3^K3^C3^U34-S3 

N2-0. 

_ K2-N? 

U2aN? 

_C?aN2 : • 

S2-*03 




c» ••• 

C*********» arnHAeM m_ 

C DO 3900 NTa1«t701 

DO 3900 r4T»1#t061 

T«MT 

C If IT-T9I yy30<gPgQ«g>>Q 

C2220 V(?3I*1900 
C2230_V« 3 » -VJ 23»»V<3 »> 

VI 3|a| RATt/K3* )«ll*-i.)(P(-K39»Tn 

IF IT-T5I 2?30/?220#22PO - 

2220 VI 3 I «v I 3 l♦VWC•CXP| •K3«»l T-T9 I ) 


C VI 1 3* I »V I 3 »/T3 

C VI3« l•VI^«)♦VI 13A|«0 

C »»»»» » • • •• • • • • • • *__aUJjL*J» • 

C VI AlaVIJAI-VIASI 


2230 VI 4 I •! OavRaTF/I K4S-K3A I I* I 1 1 • /K39 )• I l*«eXP| •X39«T) )• 

1 II #/K45» •!! .-FXPI-K45*? » I I 

1FIT-T5I 22«0#22A0*2?AO 

22*0 V|4)-vl*i4|K3A*VWC/IKA5-K3AI I • I FXP I •KSA* I T»T9 I I "EXP I -K A9« I T»T5 ) ) I 

_C_ ^V I I 4 9 » • V I 4 J_/.T 4 

22b0 VI 145I«VI4|/T4 

C VI 49 iaVI 4bl4VI 145)40 . 

C4 44 9* •»•*•• ••«•«• BLOOO 444*4444444‘4444*444444444444444444444444444444 

VI IS)«VI 149)4V|.165)-VI 196)-VMBI4VI129I-VI 159». 

VI9)«VI9)4VI 19)40 

0 1 1 B ) ■ 0 1 1,49 ) ■QI196)-QI 1R)4QI 1PB)»QI 199) 

OI5)>MI9)40I 15)40 

015) -Ulb)4lO00*/Vl5) 

C444*«»*««»»*»»«,« interstitial space 4444444444*4444444444444444444444 

VI 1 A )-VI IbA ) -V I t 6b )-VI1 A7 ) -V I 1 KiP ) 

VI6)«VI6)4VI 16)4D 

01 16 )40l 156)-0I 169 )-0XJL62J 

016) *OI6)4QI 16)40 

ei6)4QI6)4in00«/VI6) . . . . 

C44444444444444444 CELLS 4444444444444444444444444444444444444444444444 

VI17)»VI167) 

VI7)4VI7)4VI17)40 

__ . 0l7)»0l7)4)000..yVL7J 

C44444444444444444 CAPILLARIES 4444444444444444444444444444444444444444 

VI 9 ) »V lb ) 4VI 6 ) 4V I 7 ) 

B-E4VI5) 

PI-1140 . 

P2-I240 

P3-P64 1 34 LV.L4 ) -^J.60LJLI 

PA-X/V I 9 ) 

IF <P4-P7) ?790/2800#?900„ .. _ 

2790 X-X4XP4D 

2800 VI 196 ) -T A4 (P1-P3-PA4PS )442/| PI -P2 ) . .. 


VI 1 6S ) -1 44 IP2-P3-PA4PS )44?/» PI -P2)4T9 

0 1 1 6 ) - 1 6 4 I n.l 5 L- 0.( 6J_)uil0.00.» 

C44444444444444444 C E L L - 1 N T K R R T J T I A L INTERFACE 
VI 167)-J4lfll7)-0I6) )/l000. 

C44444444444444444 AOM 444444444444444444444*4 


HI -I l.-LOI*lL?*IBO*OO/fl4Ll-HO)-L5*FXPILAA(L3-B0*0O/B» ) ) 
H?-| 0*IL24lf!l5)4Ll-00)-l 5*EXPIL4* 1 1,3-015) ) ) ) 

_1F IH?) .30*0/3050>3050 

30A0 H2-0. 

30b0 IF |M1) 3060#3070#3070 _ 


30#*0 Ml«o« - 

3070 H3*m}*M? 

T 6 • ? 0 tO 

M6»M6* I*<3»WA ••O***©/!* 

M7»w74 <M4«M7 ••©•♦•0/J4 

HgaMM« |H/*HR (•©•••O/TA 

H9aMM« (Hg*H9 )90 oA*0/.T> 

Hb>wS« IM9aH^/T9 I «0 

M-Mg/V.IM 

C*Va«««**«»a»a«*a* ANOIflTeNSlN •••• 

R1«“1*I01-«I _ 

IF (R1I 331 A»'3'320~« 33^0 

3314 Rl»0» . 

3320 R2«R2*1RI-R?/t6T*0 

R"R?/V < 9 > 

81«M?»R 

02»0?*l0l-nR/Tl»*0 

o»n?/v (b I 

A1 aMgaMSaO*! 1 t.O-.Hg ».*M7aK/VJ.!» » 

A2aA2*IAl-A?/f2»*0 
A a A 2/VJ_5_»__ 

M aM«a A 

N?aM5aN/V< 9I"N1_ 

IF (N?1 3a30*3AA0«3aA0 

3430 N2a0# 

3440 K2aM6aA 

: aaa a_^a a a a a a aaa aaa KI *^*:-' , aaaa* »aaaaaaaa aa»<iR4»4R#»» 

ZlaM-7/T8‘ 

Z"7*71*0 __ . . 

IF (71) 3530«3530#3S>7 

3527 ZlaC. 

3530 V( lA )aMl/( WRAH )♦ ( *05 a1 *0/( WRaH ) )«( -Z l )»W3 

_I ^ .jyj I « D _3 55Ji/J.5> ft/ J!5 4 0 

3550 V(lg|aO* 

3560 02aV1 a ( 1 .Oav2* ( 1 .0-EXP(-Y3aV( IR) ) ) )*U/V(9) - 

CZaNRaK? 

0( IM »aSRaKR*C2*U2*8? . 

V(lg(aV(lg)40( 18 ) a 1000*/ 1400* 

_ uRavi.« 1 .navRaM .n-r>tPi.Y:4a\/Mannmuy¥f I 

Q( 18 )aS2a<RaSR^U2AC2 

0( 8)afi( 18 »a1 OOO./VC 18 1 . . . _ - 

08a (0( lb9laU(162) )/0(9l 

NaNa ( ^^•N^-^•a08 ) *0 — — 

KaKa ( K 3-<R-K*08 ) *0 

CaCa(C3-C?).*0 — 

L|aU« (L'3- J2-U«Q8 ) »0 

SaSa («53-SR-8*Q8)*0 - - 

0( 9) aWaKaCaijaS 

Ca««aaaaaaaaaaaaaa PR J NT_0UT_*** 

COU 1 )aV(3) 

C0L« ?) aV ( A ) 

C0L« 3 I aV ( 5 ) 

CUU A)aV(4) 

CBL(b»aV(7) 

C6L<4)aV(«») 

C0Lr7)av(18) 

COL ( 8 ) a(J ( ft ) 

C0L(9|aU(6) 

CRUM0)ag(9) 



COL« 1 1 - . . 

COLCl? I-M 

.COL « I 3J.-H 

COL( 1* )*0 

C0LM^»»A 

COLI lA )«N? 

COI.M7I-K? 

COL< ti» l-C? 

, CBL « 1 ^ » -U? 

CeLt?0)»0<«» 

CCi.( ?1 l-OI 

CCLI2?»-0«7I 

C0L<?1>»0««I 

IF(T-t.) 3700#3605#3700 

_DO. .361 9.iT-.1^Jl(5RX.O__ 

REAO i5«3610I NUMBER* ALPHA ( I T ) * BET A < I T I 

format I IB* AX/3AA.) 

30 TO (3611 *361?*36l3*361A*36t5*36t6*36l7*361R* 

NCl-NlJMBtR . ^ - 

NC2-NUMPEH 

_N C 3 • M Ii1 BJLR 

nca-numbeh 

NC5»NiiMBtR 

NC6-NUMHEH 

NC7-NUMBER 

NCH-MtMBEH 

_NC9»Ni;MBER 

30 TM (36?1*3622*3623*362A*36?S*36P6*36?7*362R/ 

<<RITE (6*3631 ). ALPHA (_1.).*BETA( I ) 

30 TO 3700 

wRt TF. ( 6* 363? ) ( ALPHA (.1.8 ) * BET A ( 1 S » # . T 8» 1 * 2J 

GO TO 3700 

l_ w R I T cj 6 * 3 6 33) ( A LPHA ( T8L *BeTA(.18J.i__L8jLljL3LJ 

30 TO 3700 

' WRITF ( 6* 363A )_(.ALPHA (,.T 3 I *BETA( IS ) *_TS»t.* > )_ 

30 TO 3700 

» »<P1TF» 6* 3638 ) (ALPHA( T8)*BETA( T8)» TS-l*5l 
GO TO 3700 

. *<H1TF« 6* 3636 }_( alpha (.T.S ),*HET A( ) S ) /_J S»L*.6 ) 

GO TO 3700 

' WRITK 6*3637 ) (ALPHA( ISI*BETA( IS)* .1S«1*7)_ 

GO TO 3700 

J wRITfc.(6*363R) _(ALPHA(.TS)*HETA( IS)* TS«1*R) 

30 TO 3700 

) WRITF ( 6* 363.SJ_JALPHALLSJ-*-BET.A(lS )*_-lS"JL»JJ 

L F0PMAT(57X» •TIME*7X*PA4/) 

» F0RMATtbOX. 'TIME'7X*?AA*6X*?AA/) 

) format ( 4 3x» 'TIME'7X*2A4*2(6X*?AA)/) 

► format (36X. 'TIME '7X*?AA,3(6X*?A4 )/ ) : 

i format ( 29X*'TIME*7X*?A4*4(6X*?A4)/) 

)_F0RMAT i ??X*J.TIME •.7.X».?A4.*.5.(.6X*.?.A4.)/J 

' FORMAT) 15X*'T1ME'7X*?A4,6(6X*?A4)/) 

J FORMAT) HX* • TIMF. *7X*?A4,7( 6X*?A4 )/ ) 

» FORMAT) IX* •T1MF'7X*2A4,8(6L’*?A4)/) 

FI-T-1. 

) F1«t-1 • 

.IF ( T - ( T 5 - 1. 0.» JJ_3 7.20 jJ37AO.*-3 7JL0 

) F2.Fl/60. 

F6.F1 


3619). 


36?9)*N0RE0 


00 TO 37bO 

3740 

C Ffc«T»TS — 

C37bO‘lF3«r? 

37b0 IF6-T-T5 ’ 

IF3.F? 

F3-IF3 _ 

F4-F3-F? I 

IF <F») 3 900*3800*3900 i 

3800 00 TO <3H01.3802#3H03#3H04i3805i3ROf*#3R07#3808#3803»>*^n»fO 

C3800 WRITF (6#3R10», F.6»,V <.»»»«< S I » V ( IM 0 «.«) »H . 

C3800 write (10M«3810) F6# V I S > # 0 I 5 ) « V ( 18 » « 0 ( R ) » N 

C3810 format (RF10.5) — 

3801 WRITE (6«3R11) IF6#C0L(NC1I 

__ _Qtt TO 3900 — 

380*2 WRITE (V>«3R12) I F6« COL I NCI ) « COL ( NCR I 

00 TO 3900 . . . 

3803 WRITE 16*38131 I F6* Cm I NCl ) « COL ( NCR I *COL < NC3 ) 

on TO 3900 . . . 

3804 WRITE (6*3R14) I F6/ CCI. I nCI I * COL I NCR ) *COL C NC3 ) * COL « NC ‘ « 

_ . _Q0_Tg_390Q 

38d5**wHITE « 6* 3819) IF6/C0I. CNCl » » COL ( NCR ) » COL < NC3 ) » COU NC4 1 * COL ( NC5 » 

00 TO 3900 . 

3806 WHITE <6*3R16) 1 F6* COL I NC 1 ) » COL ( NCR ) * COL I NC3 I » COL ( NC4 > * COL ( NC5 ) A 

1C0L(NC6) .. _ 

00 TO 3900 

_3 8 0 7_ w R I T E _( 6 *3 R17) IF6/ gfli iWCl I.ewUMOlACeLlMCaiACflLlMC^IjCWLfWCfLAj 

lCeLrJC6»*C0l.1NC7» 

00 TO 3900 J. - _ 

3808 WRITE (6*3Rl8» 1 F6* COL • NCl ) # COL ( NCR » * COL < NC3 » * COL • NC4 ) * Cfll ( NC5 » a 

ICOLINCbl »COl (NC7 »aCOL( NC8» . _ . . 

00 TO 3900 

_3 8 0 9_WR I T E _ ( 6 A 3 R 1_9 L J F 6 a.C O l_LN.C Uj C 0 1 t Mg»i »gOL IMCa I < NC4 > ( NCS Li 

1C0L(NC6) aCOi (NC7)AC0L(Nr.8»ACni (NC9I 

3811 F0R0AT(57Xa T4# F14.2) . 

3812 F0RmaT150XaT4,2F14.2) 

3813 FOHf'ftT 5 ^.JXa I4a 3F14.2 ) . 

3814 format ( 36Xa T4a4F14.R ) 

381b FeRMAT«29XAT4A5Fl4.2) — 

3816 format ( 2?Xa T4a 6F14 .2 » 

3817 format M 5Xa T4,7F14.? » 

3818 FohmaTI 8X# T4#8F14»2» 

3819 FBPmaTI 1 Xa T 4, 9F14 .? » 

3900 CONTINUE 

•TP 




afikh 

FARTING FOR 

6 HmiPR# TWF 

SUBJECT CONSUMES 

IbOO ML OF 

water* 

TI1E 

PI ASMA V 

Plasma o 

u ml/min 

URINE 0 

AOH 



_ _ 

, 0 

5 V 

y 

• 160 

3000*90 

300*20 

1*00 

7b0.98 

4.99 

• 100 

2992.40 

300*46 

1*10 

693*11 

4.6b 

• ?<»0 

29S6.96 

300.46 

1*06 

716*69 

4. 73 

•1 HO 

2908,2#, 

300.48 

1*06 

718.07 

_ 4.70 

-»?0 

2909.19 

300.51 

lk04 

731.43 

4.74 

• 60 

3000. 1 4 

300.53 

1*03 

741.7b 

4.79 

•IG 

3000.75 

300*54 

1*03 

745*04 

4*82 

0 

3000.86 

300.54 

1*03 

745*68 

4.82 

10 

3140.03 

295.04 

1*19 

690*8b 

4*40 

?0 

332K.H1 

_??0.69 

1.71 

536*00 

3.33 

30 

34S7.05 

287.83 

2*51 

395.45 

2*28 

hO 

3509. 69 

286. 3P 

3*57 

295.05 

1*52 

50 

3502.04 

285.83 

4.81 

225.93 

1.01 

60 

3455* 34 

286.13 

6.19 

178*15 

0*67 

70 

3388*01 

286.99 

7.62 

144.95 

0*45 

80 

331 1 .79 

288.27 

8*98 

121.89 

0.30 

90 

3232.60 

289.80 

10.19 

105.95 

0*20 

1 00 

3157.59 

251 .43 

11,17 

95.04 

0.14 

no 

3090.76 

293.09 

11*89 

87.69 

0.09 

1?0 

3033.74 

294,71 

_ 12.37 

_ 82.85 

0*06 

1 30 

2986.77 

296*24 

12.47 

80.87 

0*05 

1 40 

2957.57 

297.29 

10.21 

i)6,90 _ 

0.13 

1 50 

2958.01 

297.67 

7.09 

135.76 

0.3b 

1 60 

2973.81 

297.84 

5.35 

17b* 18 

0.56 

1 70 

2989,96 

29;. 96 

4.67 

198*22 

0*68 

1 80 

3000.70 

. 298.11 

^•60 

201.44 

0*63 

1 90 

3004.68 

298,32 

4.90 

190.45 

0 . 60 

2.00 

3002.31 

258,61 

5.39 

174,40 

0.50 

>»10 

2995.36 

298.97 

5*82 

162*08 

0.42 

?20 

2987,22 

. 299.33 . . 

. ..5.85 _ .. 

. 160*32 

0.41 

?30 

2984,20 

299.50 

4.8C 

190*20 

0.56 

/>40 

2991.69 . 

259.46 

3.4b 

. 253.32 

0.89 

?50 

3003.73 

299.37 

2*76 

308.37 

1*16 

?60 

3013.94 _ 

299.32 

2.58 

327.19 

1.24 

?70 

301 9.91 

259.32 

2.72 

313.57 

1.17 

?80 

3021 ,54 

299.38 

2.96 

. 290,94 

1.05 

290 

3020.40 

299.47 

3*09 

279.27 

0.98 

300 

301 8.94 

299.56 3.00 

286*24 

1*01 

310 

301 8.98 

299.61 

2*74 

309.22 

1 *12 

_ 3?0 

3020.77 

299.63 

2.45 

339.94 

1.2b 

330 

3023.56 

299.64 

2.22 

370.29 

1.40 

340 

302b. 52 

299*64 

2.06 

. 395*51 

1*52 

350 

3028.98 

299.65 

1*99 

407.73 

1 .60 

360 

3030,74 

299.67 

1.94 

416*69 .. 

1.67 

3 70 

3031.95 

299.69 

1*90 

424*22 

1.72 

380 

3032.79 

299.71 

1.86 

43-1^-43 

1.78 . 

390 

3033.39 

299.73 

1*82 

438*94 

1*83 

400 

3033.87 

299,76 

1*79 

447.04 

1*90 


